home *** CD-ROM | disk | FTP | other *** search
/ Power Programmierung / Power-Programmierung (Tewi)(1994).iso / magazine / dbms_mag / 9107 / aqua2 < prev    next >
Text File  |  1991-05-28  |  656b  |  16 lines
  1.  
  2. LISTING 2
  3.  
  4.       //───── draw arrows if data off to left or right  
  5.       if b:leftvisible > 1                              
  6.          @ maxrow(), 0 say chr(17) + chr(196)           
  7.       else                                              
  8.          @ maxrow(), 0 say space(2)                     
  9.       endif                                             
  10.       if b:rightvisible < b:colCount                    
  11.          @ maxrow(), maxcol() - 1 say chr(196) + chr(16)
  12.       else                                              
  13.          @ maxrow(), maxcol() - 1 say space(2)          
  14.       endif                                             
  15.  
  16.